From: Stefan Kangas Date: Wed, 8 Dec 2021 00:55:50 +0000 (+0100) Subject: Convert etc-authors-mode-map to defvar-keymap X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~16^2~4049^2 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=176c63287ffdf56634984494f6610102737f393e;p=emacs.git Convert etc-authors-mode-map to defvar-keymap * lisp/textmodes/etc-authors-mode.el (etc-authors-mode-map): Convert to defvar-keymap. --- diff --git a/lisp/textmodes/etc-authors-mode.el b/lisp/textmodes/etc-authors-mode.el index 8b5fefd3b7d..a79a1ecf4bb 100644 --- a/lisp/textmodes/etc-authors-mode.el +++ b/lisp/textmodes/etc-authors-mode.el @@ -115,12 +115,10 @@ With a prefix arg ARG, move point that many authors backward." (interactive "p" etc-authors-mode) (etc-authors-next-author (- arg))) -(defvar etc-authors-mode-map - (let ((map (make-sparse-keymap))) - (define-key map "n" #'etc-authors-next-author) - (define-key map "p" #'etc-authors-prev-author) - map) - "Keymap for `etc-authors-mode'.") +(defvar-keymap etc-authors-mode-map + :doc "Keymap for `etc-authors-mode'." + "n" #'etc-authors-next-author + "p" #'etc-authors-prev-author) ;;;###autoload (define-derived-mode etc-authors-mode special-mode "Authors View"